﻿Imports DTO
Public Class ChiTietHoaDonDAO
    Public Shared Function Them(ByVal ct As ChiTietHoaDon) As Integer
        Dim sql As String = "insert into CHITIETHOADON(MaHoaDon,MaPhong,SoNgayThue,DonGia,ThanhTien) values(" + ct.MaHoaDon.ToString() + "," + ct.MaPhong.ToString() + "," + ct.SoNgayThue.ToString() + "," + ct.DonGia.ToString() + "," + ct.ThanhTien.ToString() + ")"
        Return Dataprovider.ExecuteNonQuery(sql)
    End Function
End Class
